***************************************************************** 

* * 

* CP/M VERS 2.2 COLD START LOADER. * 

* * 

* THE F OLLOWING ROUTINE S WILL BOOT CP/M FROM THR DISK 

* JOCKEY 2D REV. B, OR FROM THE DISK JOCKEY HARD DISK 

* CONTROLLER. 
* 



* 
* 



* FLOPPY BOOT: * 

* THE COLD BOOT LOADER (TRACK 0, SECTOR 1) IS LOADED INTO * 

* RAM ON THE CONTROLLER BY THE COLD BOOT ROUTINE IN THE * 



* FIRMWARE. THIS COLD BOOT LOADER WILL START LOADING THE 

* CCP FROM TRACK 0, SECTOR 5 AND WILL FINISH UP WITH THE 
..*. LAST PART OF THE CB I OS ON TRACK 1 SECTOR 7. 



* 

* 
* 



£MMl,f£( 



Brf« 3fi<a,rt. fy*** 



sy&e : xm~ 



* DURING A WARM BOOT 

* LOADED FROM TRACK 

* " 

* 
* 



* 

* 

* 
~*~ 

* 

* 
'*' 

* 

* 

TT 
* 

* 

* 

* 



TRACK 

w 





" 0" 

















SECTOR 

~T~ 
2 

_3 
' 4" 
5 
6^ 
"7 
8 
9 

11 
12 



SECTORS 1, 
1. _TRACK_ 0_ 

SYSGEN 



2, AND PART OF 3 WILL BE 
LOADING IS UNAFFECTED. 



900 
980 
A00 



LOAD ORDER 
FF00 T" 



NAME 



* 
* 
* 

* 
* 
* 



■-££&. 



A80 
B00 
B80 



9500 
9580 



C00 

C80 

D00 

D80~ 

E00 

E80 



9600 
9680 
9700 
".9780" 
9800 
9880 









13 

14 
15 



F00 

F80 

1000 



9900 
9980 
9A00 



2 
13 

3" 
14 

4 
T5 

5 
J.6 

"6" 
17 

7 



BOOT LOADER 
UNUSED 



CCP 



* 
* 

* 

* 

* 

__ 

* 
* 

* 

* 



~w 







16 
17 

18 



1080 
1100 
1180 



9A80 
9B00 
9B80 



* 
* 
*- 
* 
* 









19 
20 
21 



1200 
1280 
1300 



9C00 
9C80 
9D00 



18 
8 

9 

20 
10 



* 

* 

* 



< 

7} 



f* 

M 



< 






BDOS 



* 
* 
* 



* 
* 







~w 




23 

24 

26 



1380 
1400 
1480 
T5W 
1580 



9D80 
9E00 
9E80 
9F00 
9F80 



21 
11 
22 



12 
23 



~ J Ht 
* 
* 



"I"I^~RE'CaRDETrT5r _ D"OOSEE"DEN51TY "Fo'KHKTT""" THERE "ARE 



* 1024 BYTES PER SECTOR. 



* 

* 

* 

* 
* 



* 



1 
1 
1 
I 
1 
1 



1 
2 
3 



4^ 

5 

6 



1600 
1A00 
1E00 
"2200 
2600 
2A00 



A000 
A400 
A800 



4 
1 
5 



CBIOS (@ AB00H) * 



AC00 
B000 
B400 



2 
6 
3 



* 
* 
* 







* 

* 
* 
* 

* 


1 7 2E00 B800 7 

1 8 3200 BC00 UNUSED 

NOTE THAT THE INTERLEAVE SEQUENCES FOR LOADING TRACKS AND 1 
ARE DIFFERENT. THIS DIFFERENCE WAS DESIGNED SO THAT THE 


* 
* 
* 
* 
* 




1 




* 

* 


BOOT SEQUENCE COULD BE DONE IN 4 DISK REVOLUTIONS SINCE THE 
2D MOD. B CAN NOT LOAD CONSECUTIVE SECTORS OFF OF THE DISK. 


* 
* 
* 








* 

* 
* 


THREE SPARE SECTORS (TRACK 0, SECTORS 2 TO 4) HAVE BEEN 
PROVIDED FOR A MORE ADVANCED BOOT LOADER AT A LATER DATE. 


* 
* 
* 








* 
* 
* 


HARD BOOT (M10, M20, M26) s 

THE COLD BOOT LOADER (TRACK 0, SECTOR 1) IS LOADED INTO 


* 
* 
* 








* 
* 
* 


RAM AT EITHER 0100H OR THE 2DB'S RAM DEPENDING ON WHETHER 
THIS LOADER IS ASSEMBLED WITH A 2DB OR NOT. THIS COLD 
BOOT LOADER WILL START LOADING THE CCP FROM TRACK 0. 


* 
* 
* 




ry : 




* 

* 


SECTOR 2 AND WILL FINISH UP WITH THE LAST PART OF THE 
CBIOS ON TRACK SECTOR 21. 


* 

■'•*' : 
* 








* 
* 
* 


TRACK SECTOR SYSGEN LOAD ORDER NAME 

1 900 FC00 1 COLD BOOT 
2 B00 9500 3 CCP 


* 

* 

* 








* 
* 


3 D00 9700 4 
4 F00 9900 5 
5 1100 9B00 6 


* 

■''*'■' 
* 








* 
* 


6 1300 9D00 7 BDOS 
7 1500 9F00 8 
8 1700 A100 9 


* 
* 

* 




r' ■.'■/■' 




* 
* 


9 1900 A300 10 
10 1B00 A500 11 
11 1D00 A700 12 


* 
* 
* 








* 
* 
* 


12 1F00 A900 13 

13 2100 AB00 14 CBIOS 

14 2300 AD00 15 


* 
* 
* 

* 

* 








* 

* 
* 


15 2500 AF00 16 
16 2700 B100 17 
17 2900 B300 18 








* 

* 
* 


18 2B00 B500 19 
19 2D00 B700 20 
20 2F00 B900 2 PARTIAL LOAD 


* 
* 








""" *' 

* 
* 


15 21 3000 UNUSED 
THE WARM BOOT LOAD SEQUENCE STARTS AT TRACK 0, SECTOR 2 


4c 
* 

* 








* 

* 

* 


AND GOES STRAIGHT THROUGH TO SECTOR 12. THERE IS STILL 
PLENTY OF ROOM LEFT IN THIS LOADER FOR MORE ADVANCED 
THINGS LIKE SECTOR INTERLEAVING ALTHOUGH THIS IS HARDLY 


* 
* 
* 




* NECESSARY ON A HARD DISK. * 

* * 
******** ** ****************** ** ************** ** ************ ** ***** 




003E = 
A800 = 


MSIZE EQU 62 ;MEMORY SIZE OF TARGET CP/M 
BIAS EQU (MSIZE-20)*1024 ; MEMORY OFFSET FROM 20K SYSTEM 








CD00 - 
E300 = 
E300 = 


CCP EQU 2500H+BIAS ; CONSOLE COMMAND PROCESSOR 

BIOS EQU CCP+1600H ;CBIOS ADDRESS 

CBOOT EQU BIOS ; COLD BOOT ADDRESS FOR CP/M 







£ 

M 



< 

I 

1 33. 

m 
> 



CD00 
000A 



LOADDR EQU CCP 
RETRIES EQU 10 



;LOAD ADDRESS FOR FLOPPY 
; MAXIMUM # OF DISK RETRIES 



! 



*************************************************************** 

* * 



* THE FOLLOWING EQUATES SET UP THE RELATIONSHIP BETWEEN THE * 

* 2D FLOPPIES AND THE HARD DISK CONTROLLERS. * 

* * 



""* *'* * * *"* * * * * *"**"* ************** * "if * ********************************* 



0001 = 



0001 

0004 



FIRST EQU 



MAXHD EQU 
MAXFLOP EQU 



1 
4 



= FLOPPIES ARE A-D DRIVES AND 



HARD DISK ARE E-P 
1 - HARD DISKS ARE A-L DRIVES AND 
FLOPPIES ARE M-P 



SET TO NUMBER OF HARD DISKS 
SET TO NUMBER OF FLOPPIES 



*************** ***************** * * * * * ****** * * * * * * * * * * * * ****** *■*•* * 
* THE FOLLOWING EQUATES ARE FOR THE DISKUS HARD DISK IF WANTED. * 



***************************************************************** 



•:■;? 


0050 = 

0050 = 


IF 
HDORG EQU 
HDSTAT EQU 


{MAXHD NE 0) AND 
50H ; 
HDORG ; 


FIRST ;WANT HARD DISK INCLUDED ? 
HARD DISK CONTROLLER 
HARD DISK STATUS 


i 




0050 = 
0053 = 
0052 = 


HDCNTL EQU 
HDDATA EQU 
HDFUNC EQU 


HDORG 

HDORG+3 

HDORG+2 


HARD DISK CONTROL 
•HARD DISK DATA 
HARD DISK FUNCTION 




'■ 


0051 = 
0051 = 
0002 = 


HDCMND EQU 
HDRESLT EQU 
RETRY EQU 


HDORG+1 
HDORG+1 
2 


•HARD DISK COMMAND 
•HARD DISK RESULT 
•RETRY BIT OF RESULT 






0001 ~ 

0002 = 
0004 = 


TKZ EQU 
OPDONE EQU 
COMPLT EQU 


• 1 
2 
4 


•TRACK ZERO BIT OF STATUS 
•OPERACTION DONE BIT OF STATUS 
•COMPLETE BIT OF STATUS 


J 


■ 


0008 = 
0010 = 
0020 » 


TMOUT EQU 
WFAULT EQU 
DRVRDY EQU 


8 

10H 

20H 


rTIME OUT BIT OF STATUS 
•WRITE FAULT BIT OF STATUS 
•DRIVE READY BIT OF STATUS 


1 




0040 = 
0004 = 
00FB = 


INDX EQU 
PSTEP EQU 
NSTEP EQU 


40H 

4 

0FBH 


•INDEX BIT OF STATUS 
•STEP BIT OF FUNCTION 
•STEP BIT MASK OF FUNCTION 






00D"4~ = 
0200 = 
000F = 


HDRLEN EQU 
SECLN EQU 
WENABL EQU 


4 

512 

0FH 


• SECTOR HEADER LENGTH 
r SECTOR DATA LENGTH 
r WRITE ENABLE 


! 
i 




"000B = 
0005 = 
0007 = 


WRESET EQU 
SCENBL EQU 
DSKCLK EQU 


0BH 

5 

7 


? WRITE RESET OF FUNCTION 
; CONTROLLER CONTROL 
rDISK CLOCK FOR CONTROL 






""00F7~= '"." 
00FC = 
0000 » 


MDIR EQU 
NULL EQU 
IDBUFF EQU 


~0F7H 
0FCH 



; DIRECTION MASK FOR FUNCTION 

?NULL COMMAND 

f INITIALIZE DATA COMMAND 


i 

'■'■■' '•■! 




~~mvsr=" 

0001 = 
0005 = 


ISBUFF EQU 
RSECT EQU 
WSECT EQU 


-- ff~ - 
1 
5 


? INITIALIZE HEADER COMMAND 
;READ SECTOR COMMAND 
? WRITE SECTOR COMMAND 








END IF 









***************************************************************** 



* THE FOLLOWING EQUATES ARE FOR THE DISK JOCKEY 2D/B IF WANTED. * 

* * 

**************** ************************************************* 



F800 = 
FC00 = 

F809 = 
F80C = 



F80F = 
F812 » 
F815 = 



F824 = 
F827 = 
F82A = 



F82D = 



FC00 = 



0D00 = 





IF 


MAXFLOP NE 






ORIGIN 


EQU 


0F800H 


;ORGIN OF DJ 2D MOD B PROM 


i 


DJRAM 


EQU 


ORIGIN+400H 




,.,-! 



TKZERO 
TRKSET 



EQU 
EQU 



ORIGIN+9H 
ORIGIN+0CH 



SETSEC 
SETDMA 
DREAD 



EQU ORIGIN+0FH 
EQU ORIGIN+12H 
EQU ORIGIN+15H 



DMAST 

STATUS 

DSKERR 



EQU 
EQU 
EQU 



ORIGIN+24H 
ORIGIN+27H 
ORIGIN+2AH 



SETDEN 



EQU 
END IF 



ORIGIN+2DH 



DISK JOCKEY 2D MOD B ROUTINES 

TRACK SEEK 

SET TRACK 



SET SECTOR 

SET DMA ADDRESS 

READ SECTOR 



GET DMA ADDRESS 
DISK STATUS 
FLASH ERROR LIGHT 



SET DENSITY 



IF 
BOOT 



BOOT 



FIRST 
IF 

_EQU 

ELSE 

EQU 

ENDIF 



MAXFLOP NE 
DJRAM 



; DEFINE START ADDRESS IF HARD DISK 
; IF FLOPPY I S THERE THEN USE ITS RAM 



0100H 



;OTHERWISE START AT 0100H 



BOOT 



ELSE 
EQU 

ENDIF 



DJRAM+0300H 



OFFSET EQU 



900H-BOOT 



;DDT OFFSET 



~**~ * ** * * * ********************************************************* 

* * 

* COLD BOOT LOADER FOR DISCUS M10, M20, OR M26. * 



-^ _. ^ 

***************************************************************** 



; DEFINE START ADDRESS IF FLOPPY 
; UPPER QUARTER OF FLOPPY RAM 



< 



£ 

M 



IF 



FIRST 



; FIRST = 1 IS HARD DISK 



FC00 



ORG 



BOOT 



FC00 


31FEFD 


BOOTHD 


LXI 


SP,CSTKHD 


FC03 


011401 




LXI 


B, l*100H+20 


FCfcJb 


CD28FC 




CALL 


CLODHD 


FC09 


2100EB 




LXI 


H,CCP+1E00H 


FC0C 


1100CD 




LXI 


D,CCP 


FC0F 


0E00 




MVI 


C,0 


FC11 


1A 


CMOVHD 


LDAX 


D 


FC12 


77 




MOV 


M,A 


FC13 


13 




I NX 


H 


FC14 


13 




I NX 


D 


FC15 


0D 




DCR 


C 


— ■- FCI6 


C2TTFC 




JNZ 


CMOVHD 


FC19 


2100CB 




LXI 


H,CCP-200H 


FC1C 


222EFC 




SHLD 


CDMAHD 



;SET UP STACK AT END OF THIS SECTOR 
;B = SECTOR COUNT, C = SECTOR # 



;LOAD SECTOR 20 INTO CCP 
.•DESTINATION OF MOVE 
; SOURCE OF MOVE 



;GET A BYTE OF SOURCE 
;MOVE IT 



;BUMP DESTINATION 

;BUMP SOURCE 

?ALL DONE WITH THIS PAGE ? 



; INITIAL DMA ADDRESS 



J 



FC1F 010212 
FC22 CD28FC 
FC25 C300E3 

FC28 C5 



FC29 
FC2A 
FC2D 

FC2E 
FC30 
FC3 3 
FC34 
FC37 
FC3A 



79 

32ACFC 

2100CB 

110002 
19 



LXI 

CALL 

JMP 

CL ODHD PUSH 
MOV 
STA 

_______ LXI 

CDMAHD EQU 
LXI 
DAD 



B,18*100H+2 

CLODHD 

CBOOT 



B 
A,C 



;B = SECTOR COUNT, C = SECTOR # 

;GO TO CP/M 

?SAVE SECTOR AND COUNT 



HDSEC 

B,CCP- 200H 

$-2 

D,200H 

D 



;GET DMA AD DR ESS (SELF MODIFYING) _____ 
.•STORAGE FOR PREVIOUS DMA ADDRESS 
; OFFSET TO NEW DMA ADDRESS 
;ADD IN OFFSET. HL = NEW DMA ADDRESS 



222EFC 
CD41FC 
CI 



SHLD 
CALL 
POP 



CDMAHD 

CRDHD 

B 



;SAVE NEW DMA ADDRESS 

; ATTEMPT A READ 

; RECOVER SECTOR NUMBER AND COUNT 



FC3B 05 
FC3C C8 



DCR 
RZ 



B 



FC3D 0C 
FC3E C328FC 



INR 
JMP 



C 
CLODHD 



; B = COUNT, C = NUMBER 

; UPDATE SECTOR COUNT 

;ALL DONE ? _ 

.♦CONTINUE READING 



~*KT* * *************** * * * ******************************************* 

* * 

* RDHD DOES THE ACTUAL READ FROM THE CONTROLLER, THE DMA _____ 

— — — - ^ 



* ADDRESS AND SECTOR # HAVE ALREADY BEEN SET UP. 

* 

***************************************************************** 



FC41 01010A 

FC44 C5 
TC45"CD5IFC~ 

FC48 CI 

FC49 D0 

~FC4~AU5" 

FC4B C244FC 

FC4E C34EFC 



CRDHD 
CRHD 



LXI 
JPUSH_ 
CALL 
POP 
RNC 
DCR 
JNZ 
JMP 



B,RETRIES*100H+1 ;MAXIMUM # OF ATTEMPTS 



B 



;SAVE ERROR COUNT 



HDREAD 
B 



; ATTEMPT THE READ 

-, RESTORE THE ERROR COUNT 

; RETURN IF NO ERROR 



B 

CRHD 

$ 



; UPDATE ERROR COUNT 

;TRY AGAIN IF NOT TO MANY ERRORS 

; DYNAMIC ERROR HALT 



< 



£_ 



< 

_n 

m 
> 



FC51 CD98FC 
FC54 D8 
FCbb 3E0I 
FC57 D351 
FC59 CD7EFC 
FCbC U8 ~~ 
FC5D AF 
FC5E D351 
FC60 0b80 
FC62 2A2EFC 
FC65 DB53 



HDREAD CALL 
RC 

MVI 
OUT 
CALL 

—nc 

XRA 
OUT 



HDPREP 



; PREPARE THE SECTOR HEADER IMAGE 
yERfeOR EXIT 



A.RSECT 

HDCMND 

PROCESS 



TCfoV DBbi 
FC69 DB53 
FC6B 77 

"PCSC "23 "" 
FC6D DB53 
FC6F 77 

~F r CT0~"Z3~ 
FC71 DB53 
FC73 77 



MVI 
LHLD 

IN 

_ m 

RTLOOP IN 

MOV 

I NX 

IN 

MOV 
_ -J5JX- 

IN 
MOV 



: : A:.^ 

H DCMND 

B,SECLN/4~ 

CDMAHD 

HDDATA 

HDDATA 

HDDATA 

M,A 



;READ SECTOR COMMAND 

; PROCESS THE READ^ 
TERROR EXIT" " 
JPOINTER TO DATA BUFFER 

".•NUMBER OF BYTES TO READ 
;GET DESTINATION OF DATA 
;TWO DUMMY DATA BYTES 



H 

HDDATA 

M,A 



rMOVE FOUR BYTES 
7 BYTE ONE 

;BYTE TWO 



HDDATA 
M,A 



•BYTE THREE 



L_ 



FC74 23 
FG75 DB53 
FC77 77 
FC78 23 
FC79 05 



FC7A C269FC 
FC7D C9 



FC7E 
FC80 
FC81 
FC83 
FC86 
FC88 
FC8A 
FC8C 

_FC8E 
FC8F 
FC90 
FC92 
FC94 
FC95 

J"C96^ 
FC97 

FC98 



DB50 

47 

E602 



CA7EFC 
3E07 
D350 
DB50 

E608 

21— 

C0 

DB51 

E602 



37 

C0 
AF 



FC9A 
FC9C 
FC9D 
FC9E 
FCA0 
FCA2 
FCA4~" 
FCA6 
FCA7 
TCW 
FCAB 
FCAC 
"FCAD 
FCAF 
FCB1 
FCB3 
FCB5 
FCB7 

FCBB 



C9 

DB50 

E620 

37 

C0 

3E08" 

D'351 

3EFG 

0352 

AF 

D353 

D33T 

3E00 



D353 
3E80 
D353 
"3E07" 
D350 
3E0F 
T5331J" 
C9 



INX 


H 


IN 


HDDATA 


MOV 


M # A 


INX 


H 


DCR 


B 


JNZ 


RTLOOP 


RET 




PROCESS IN 


HDSTAT 


MOV 


B,A 


ANI 


OPDONE 


JZ 


PROCESS 


MVI 


A, DSKCLK 


OUT 


HDCNTL 



IN 

ANI 

STC_ 

RNZ 

IN 

ANI 



MVI 
OUT 
MVI 



OUT 
RET 



FBFET 

FDFE = 
FDFE 00FCT 



^RG 
CSTKHD EQU 



HDSTAT 
TMOUT 



HDRESLT 
RETRY 



STC 




RNZ 




XRA 


A 


RET 




HDPREP IN 


HDSTAT 


ANI 


DRVRDY 


STC 




RNZ 




MVI 


A, ISBUFF 


OUT 


HDCMND 


MVI 


A, NULL 


OUT 


HDFUNC 


XRA 


A 


OUT 


HDDATA 


OUT 


HDDATA 


MVI 


A,0 


HDSEC EQU 


$-1 


OUT 


HDDATA 


MVI 


A, 80H 


OUT 


HDDATA 



A, DSKCLK 
HDCNTL 
A f WENABL 
HDCNTL 



;BYTE FOUR 



; UPDA TE BYTE__COUNT_ 



;WAIT FOR COMMAND TO FINISH 



;TURN ON DISK CLOCK 



; TIMED OUT ? 



;ANY RETRIES ? 



;NO ERROR EXIT 



7 IS DRIVE READY _?_ 



.-INITIALIZE POINTER TO HEADER BUFFER 



; SELECT DRIVE A 
;FORM HEAD BYTE 



< 

7} 






< 

in 

! i 
ni 
> 
O 



; FORM TRACK BYTE 
; FORM SECTOR BYTE 



;FORM KEY 



;TURN ON DISK CLOCK 
; WRITE ENABLE ON 



BOOTHD+200H-2 



DW 



BOOTHD 



ELSE 



; FIRST = IS FLOPPY DISK 



******************************************** ********** *********** 

* * 



* COLD BOOT LOADER FOR THE DISK JOCKEY 2D REVISION B CONTROLLER * 

* * 
***************************************************************** 



ORG 



BOOT 



T0BOOT 
NEWSEC 



TRKSIZ 

"EXIT 
BACKUP 



MVI 
_EQU_ 
INR 
INR 
CPI 
EQU~ 
JC 
JNZ 
EQU 
SUI 
EQU 



A, 5-2 

A 
A 
27 

NOWRAP 

TIBOOT 

$-2 

27-6 

$-1 



; FIRST SECTOR - 2 



"•UPDATE SECTOR # 
• SI ZE OF TRACK IN SECTORS + 1 



7 SKIP IF NOT AT END OF TRACK 
•DONE WITH THIS TRACK 



;BACK UP TO SECTOR 6 



NXTDMA 



NOWRAP 



NEWDMA 

SECSIZ" 

NOWRP 



LXI 

EQU 

SHLD 

STA 

MOV 

CALL 

LXI 

EQU 

LXI 

EQU 

DAD 

SHLD 



H,LOADDR-80H 

$-2 

NEWDMA 

NEWSEC 

C,A 

SETSEC 



; MEMORY ADDRESS OF SECTOR - 100H 



;SAVE THE UPDATED SECTOR # 
;SET UP THE SECTOR 



H,LOADDR-100H 
$-2 

D ,I00H _ 
T-2 
D 
NEWDMA 



; MEMORY ADDRESS OF SECTOR 
7 UPDATE DMA ADDRESS 



100H 



NXTRTY 
FREAD 



MOV 

MOV 

C ALL 

LXI 

EQU 

PUSH 



B,H 
C,L 
SETDMA 



?SAVE THE UPDATED DMA ADDRESS 



? SET UP THE NEW DMA ADDRESS 



B,RETRIES*100H+0;MAXIMUM # OF ERRORS, TRACK # 
$-2 

B 



TIBOOT 



CALL 
CALL 
POP_ 
"JNC 
DCR 
JNZ 
-JMF~ 

LXI 

SHLD" 

MVI 

CALL 
~XRA~" 

STA 
JMVI 

STA 

DCR 

STA 



TJCI 
SHLD 
LXI 



TRKSET 
DREAD 

B 

T0BOOT 
B 

F READ 
TXSKERR 

H, CBOOT 

EXIT" 

C,l 

SETDEN _____ 

A~ 

NEWSEC 
A/8 

TRKSIZ 
A 

BACKUP 
" H, LOADDR+0700H 
NEWDMA 
H,LOADDR+0300H 



SET UP THE PROPER TRACK 
READ THE SECTOR 



CONTINUE IF NO ERROR 
KEEP TRYING IF ERROR 



TOO" "MAWHERRORS i"T FLASH~fHE LIGHT 
WE JUMP_ TO CBOOT NEXT TIME 
SELECT DOUBLE DENSITY 



FIRST" SECTOR yr~T~ 

S I ZE ______ J LOGICAL)- TRACK + I 

NUMBER OF SECTORS TO BACK UP 



DMA~STA"RT ADDRESS FOR FIRST" REVOLUTION : " - "2048 
DMA START ADDRESS FOR SECON D REV OLUTION - 2048 



< 






< 

i ±> 
m 
> 

a 



SHLD 

LXI 

SHLD 

LXI 

SHLD 

JMP 

ENDIF 



; DIFFERENCE BETWEEN DMA ADDRESSES 



NXTDMA 

H,2048 

SECSIZ 

H, RETRIES* 100H+1; MAXIMUM # OF ERRORS, TRACK # 

NXTRTY 



T0BOOT 



; GO LOAD IN TRACK 1 



A800 
CD00 



BIAS 
CCP 



FC41 
F815 
0051 



CRDHD 
DREAD 
HDCMND 



FC98 
0050 
0004 



HDPREP 
HDSTAT 
MAXFLOP 



E300 
FC2E 



END 
BIOS 
CDMAHD 



FC44 
0020 
0050 



CRHD 

DRVRDY 

HDCNTL 



FC51 
0000 
0001 



HDREAD 
IDBUFF 
MAXHD 



FC00 

FC28 

FDFE" 

0007 

0053 



BOOT 
CLODHD 



0051 
0040 
00F7 



CSTKHD 

DSKCLK 

HDDATA 

HDRESLT 

INDX 

MDIR 



00FC 
0004 
0005 



NULL 

PSTEP 

SCENBL 



0D00 
000A 
0200 



OFFSET 

RETRIES 

SECLN 



F827 
000F 



STATUS 
WENABL 



0001 
0010 



TKZ 
WFAULT 



0002 

0002 

F82D 

"F809 

000B 



OPDONE 

RETRY 

SETDEN 



TKZERO 
WRESET 



FC00 
FC11 



BOOTHD 
CMOVHD 



E300 

0004 



CBOOT 
COMPLT 



FC00 
F82A 
0052 
0004 
0008 
003E 



DJRAM 

DSKERR 

SPFUNC 

HDRLEN 

ISBUFF 

MSIZE 



F800 
0001 
F812 



ORIGIN 

RSECT 

SETDMA 



0008 
0005 



TMOUT 
WSECT 



F824 
0001 
J3050 
FCAC 
CD00 
00FB 



DMAST 

FIRST 

iHDORG 

HDSEC 

LOADDR 

NSTEP 



FC7E 
FC69 

F80F 



PROCESS 

RTLOOP 

SETSEC 



F80C TRKSET 
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